Suppress warning in mailheader.el

* lisp/mail/mailheader.el (headers): Suppress warning about
non-prefixed variable part of the advertised interface.

diff --git a/lisp/mail/mailheader.el b/lisp/mail/mailheader.el
index 936f53e96a58ad1ca6e78e23fe86564d20b040fc..8aec1940a7ea6ead4708766ae789c91b33d35220 100644 (file)
--- a/lisp/mail/mailheader.el
+++ b/lisp/mail/mailheader.el
@@ -99,7 +99,8 @@ value."
   headers)
 
 ;; Advertised part of the interface; see mail-header, mail-header-set.
-(defvar headers)
+(with-suppressed-warnings ((lexical headers))
+  (defvar headers))
 
 (defsubst mail-header (header &optional header-alist)
   "Return the value associated with header HEADER in HEADER-ALIST.